object frmCoverList: TfrmCoverList
  Left = 0
  Top = 0
  Caption = 'Album Cover Collection'
  ClientHeight = 533
  ClientWidth = 582
  Color = clBtnFace
  Constraints.MinHeight = 304
  Constraints.MinWidth = 284
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  DesignSize = (
    582
    533)
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = -10
    Top = 490
    Width = 592
    Height = 9
    Anchors = [akLeft, akRight, akBottom]
    Shape = bsTopLine
    ExplicitTop = 172
    ExplicitWidth = 486
  end
  object Bevel2: TBevel
    Left = -10
    Top = 50
    Width = 592
    Height = 9
    Anchors = [akLeft, akTop, akRight]
    Shape = bsBottomLine
    ExplicitWidth = 486
  end
  object pbHeader: TPaintBox
    Left = 0
    Top = 0
    Width = 582
    Height = 57
    Align = alTop
    Color = clNone
    ParentColor = False
    OnPaint = pbHeaderPaint
    ExplicitLeft = -2
    ExplicitWidth = 478
  end
  object lbCaption: TLabel
    Left = 8
    Top = 8
    Width = 158
    Height = 16
    Caption = 'Search for album covers'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Tahoma'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object lbAction: TLabel
    Left = 16
    Top = 32
    Width = 236
    Height = 13
    Caption = 'Search online for any missing album cover images'
  end
  object lbStatus: TLabel
    Left = 8
    Top = 471
    Width = 566
    Height = 13
    Anchors = [akLeft, akRight, akBottom]
    AutoSize = False
    ExplicitTop = 434
    ExplicitWidth = 557
  end
  object btClose: TButton
    Left = 499
    Top = 500
    Width = 75
    Height = 25
    Anchors = [akRight, akBottom]
    Caption = '&Close'
    Default = True
    TabOrder = 4
    OnClick = btCloseClick
  end
  object lvCovers: TListView
    Left = 8
    Top = 65
    Width = 566
    Height = 377
    Anchors = [akLeft, akTop, akRight, akBottom]
    Columns = <>
    IconOptions.AutoArrange = True
    ReadOnly = True
    RowSelect = True
    PopupMenu = pmCovers
    SortType = stText
    TabOrder = 0
    OnDblClick = lvCoversDblClick
  end
  object pbProgress: TProgressBar
    Left = 8
    Top = 448
    Width = 566
    Height = 17
    Anchors = [akLeft, akRight, akBottom]
    TabOrder = 1
  end
  object btStop: TButton
    Left = 415
    Top = 500
    Width = 75
    Height = 25
    Action = acStop
    Anchors = [akRight, akBottom]
    TabOrder = 3
  end
  object btStart: TButton
    Left = 331
    Top = 500
    Width = 75
    Height = 25
    Action = acStart
    Anchors = [akRight, akBottom]
    TabOrder = 2
  end
  object pmCovers: TPopupMenu
    Left = 24
    Top = 80
    object Searchforcover1: TMenuItem
      Action = acSearch
      Default = True
    end
    object Customsearch1: TMenuItem
      Action = acCustom
    end
    object BrowseImage1: TMenuItem
      Action = acBrowse
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object Removecover1: TMenuItem
      Action = acRemove
    end
  end
  object alActions: TActionList
    Left = 56
    Top = 80
    object acSearch: TAction
      Caption = 'Search for cover'
      OnExecute = acSearchExecute
      OnUpdate = acSearchUpdate
    end
    object acCustom: TAction
      Caption = 'Custom search...'
      OnExecute = acCustomExecute
      OnUpdate = acCustomUpdate
    end
    object acRemove: TAction
      Caption = 'Remove cover'
      OnExecute = acRemoveExecute
      OnUpdate = acRemoveUpdate
    end
    object acStart: TAction
      Caption = 'Start'
      OnExecute = acStartExecute
      OnUpdate = acStartUpdate
    end
    object acStop: TAction
      Caption = 'Stop'
      OnExecute = acStopExecute
      OnUpdate = acStopUpdate
    end
    object acBrowse: TAction
      Caption = 'Browse Image...'
      OnExecute = acBrowseExecute
      OnUpdate = acBrowseUpdate
    end
  end
  object tmAutoSearch: TTimer
    Interval = 100
    OnTimer = tmAutoSearchTimer
    Left = 88
    Top = 80
  end
end
